29000 READ D
29001 IF PEEK(1536)=D THEN RETURN 
29002 RESTORE 
29005 FOR I=1536 TO 1707
29010 READ D:POKE I,D
29020 NEXT I
29030 A=USR(1536)
29040 RETURN 
30000 DATA 104,169,86,141,44,3,169,17,141,45
30002 DATA 3,169,6,141,46,3,96,28,6,51
30004 DATA 6,69,6,70,6,169,6,170,6,169
30006 DATA 56,141,2,211,169,127,141,0,211,169
30008 DATA 60,141,2,211,169,0,141,255,6,160
30010 DATA 1,96,169,56,141,2,211,169,0,141
30012 DATA 0,211,169,60,141,2,211,160,1,96
30014 DATA 96,172,255,6,153,253,3,201,155,240
30016 DATA 9,200,140,255,6,240,3,160,1,96
30018 DATA 160,0,185,253,3,201,48,144,49,201
30020 DATA 112,176,45,56,233,48,141,0,211,32
30022 DATA 164,6,9,64,141,0,211,32,164,6
30024 DATA 41,63,141,0,211,173,0,211,16,251
30026 DATA 165,17,240,22,200,204,255,6,208,208
30028 DATA 169,0,141,255,6,160,1,96,160,132
30030 DATA 169,0,141,255,6,96,160,128,169,0
30032 DATA 141,255,6,96,162,0,202,208,253,96
30034 DATA 96,96
